-- card: 3021 from stack: in -- bmap block id: 2239 -- flags: 0000 -- background id: 2598 -- name: -- part 3 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=115 top=80 right=110 bottom=145 -- title width / last selected line: 0 -- icon id / first selected line: 15125 / 15125 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: C ----- HyperTalk script ----- on mouseUp put "28589,30793,29168,25638,30012,8453,17584,31008,2629," into clock put "15125,4206,24477" after clock put 30 into del put del/2 into halfdel put the rect of me into r1 put the clickloc into mc put item 1 of mc into xmc put item 2 of mc into ymc put item 1 of r1 into x0 put item 2 of r1 into y0 put x0+halfdel into xc put y0+halfdel into yc put xmc-xc into dx put yc-ymc into dy put dy/dx into t put atan(t)*57.2958 into d if dy<0 and dx>0 then put 360+d into d if dx<0 then put 180+d into d put (450-d) mod 360 into d put trunc((d+15)/30) into h if h<1 or h>12 then put 12 into h put item h of clock into hi set the icon of me to hi set the numberformat to "0.##" put d into card field degrees put h into card field hours end mouseUp -- part 4 (field) -- low flags: 00 -- high flags: 0004 -- rect: left=83 top=124 right=142 bottom=139 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: degrees -- part 5 (field) -- low flags: 00 -- high flags: 0004 -- rect: left=83 top=150 right=168 bottom=140 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: hours -- part contents for card part 4 ----- text ----- 288.43 -- part contents for card part 5 ----- text ----- 10